source("C:/Users/chrs0003/Desktop/FOX_R/R/DataAnalysis/HRTests/init.R")


resRadius20000 <- compareHRMobile(data=radius20000HR , resultsPath=HR_RESULTS_PATH, writeResults=writeResults,
                            iterations=iterations, kernelPercent=kernelPercent, mcpPercent=mcpPercent, 
                            kernelh=kernelh, name="radius20000LC32")
